100 REM **************************
110 REM *                        *
120 REM *  HIRES PICTURE LOADER  *
130 REM *    FOR COMMODORE 64    *
140 REM *                        *
150 REM *                        *
160 REM *    DON WHITE           *
170 REM *    47 ARIEL COURT      *
180 REM *    NEPEAN, ONTARIO     *
190 REM *    K2H 8J1             *
200 REM *                        *
210 REM *    613-829-2082        *
220 REM *                        *
230 REM **************************
240 REM
250 PRINT"[147]
260 [139]CT[177]0[167]340
270 [156]:[140]
280 CT[178]0:[143] INITIALIZE COUNTER
290 NN[178]20:[143] # PICTURES TO LOAD
300 V[178]53248:[151]V[170]17,59:[151]V[170]24,25:[143] HIGH RES SCREEN
310 :
320 [134]PI$(NN),CL(NN):[129]I[178]1[164]NN:[135] PI$(I),CL(I):[130]:[137]400
330 :
340 [153]"LOAD"
350 [161]ZZ$:[139]ZZ$[178]"S"[167][151]V[170]17,27:[151]V[170]24,21:[153]"LOAD":[128]
360 [151]53280,[181](16[172][187](1))
370 [151]828,CL(CT)
380 [158]3222:
390 [129]I[178]1[164]2000:[130]:[153]"LOAD"
400 [153]"LOAD":CT[178]CT[170]1:[139]CT[177]NN[167]270
410 [147] PI$(CT),8,1:[143] LOAD PICTURE ON HIRES SCREEN
420 :
430 [143] NAMES & COLOURS OF PICTURES
440 :
450 [131] FIG1,7,TEX,28,FIG2,137,HOPALONG,28,SQUEEZE,235
455 [131] GUY,80,FIG3,133,MOUND2,7,EYES,22,FRIENDS,251
460 [131] SINCOS2,44,SATELLITE,224,DONALD.DUCK,22,VM.THINGS,97,SESAME.ST,122
465 [131] NUDE.REV,1,VIS.ROSETTE,20,VIS.G1A,87
470 [131] XMAS.CARD.1,81,4HILL5,27
490 [128]